home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 38
/
Amiga Format CD38 (1999-03-15)(Future Publishing)(GB)(Track 1 of 3)[!][issue 1999-04].iso
/
-screenplay-
/
-commercial-
/
napalmdemo_v1.1
/
napalmboot
< prev
next >
Wrap
Text File
|
1999-02-08
|
710b
|
21 lines
if not exists "T:"
assign t: ram:
endif
set q `requestchoice title="Request" body="The game will now reboot your computer..." gadgets="Okay, Let's go !!!|No, please wait!"`
if eq $q "1"
Assign NAPALM: ""
Mount NAPALM_BOOT: FROM Setup/Boot-Mountlist
Makedir NAPALM_BOOT:S
Copy C:Assign TO NAPALM_BOOT:
cd sys:
Echo "CD *"`CD`*"*NC/ASSIGN C: C*NASSIGN DEVS: DEVS*NASSIGN LIBS: LIBS*NASSIGN L: L*NASSIGN S: S*NASSIGN FONTS: FONTS*NSetpatch >NIL Quiet*N" TO ram:boot1.napalm
cd NAPALM:
Echo "CD *"`CD`*"*NAssign ENV: RAM:*NAssign T: RAM:*NNapalm*NRemRad force*NWait 1*NSetup/Boot-Reset" to ram:boot2.napalm
Join ram:boot1.napalm ram:boot2.napalm to NAPALM_BOOT:S/Startup-Sequence
Wait 1
Setup/Boot-Reset
endif